home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1995 #5 & #6
/
Amiga Plus CD - 1995 - No. 5 and 6.iso
/
pd
/
daten
/
graph2d
/
rexx
/
exporteps.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1995-08-17
|
404b
|
27 lines
/*
** This script gets the selected function from Graph2D,
** sends it to MathScript and exports it as EPS-File
** Author: Kai Nickel
*/
options results
ADDRESS 'GRAPH2D.1'
GETFUNCTION MS20
fkt = result
IF ~SHOW('p',"MATHSCRIPT.1") THEN
DO
ADDRESS COMMAND "run MathScript:MathScript"
ADDRESS COMMAND "wait 3"
END
ADDRESS "MATHSCRIPT.1"
SCREENTOFRONT
SETCONTENTS fkt
EXPORT EPS
CLEAR
QUIT FORCE